home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / SimpleFaro.dxr / case keeper_76_New Behavior.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  383 b   |  16 lines
  1. global deck
  2.  
  3. on mouseDown me
  4.   sprite(me.spriteNum).blend = 100
  5.   s = the ticks + 30
  6.   repeat while the ticks < s
  7.     updateStage()
  8.   end repeat
  9.   deck = VOID
  10.   deck = new(script("deck of cards"))
  11.   repeat with i in ["ace", "two", "three", "four", "five", "six", "seven", "eight", "nine", "ten", "jack", "queen", "king"]
  12.     member(i && "text").text = "0/0"
  13.   end repeat
  14.   go(2)
  15. end
  16.